﻿<Serializable()> _
Public Class EseguimientoCreditoHip

#Region "           Atributos                       "
    Private _idProyecto As Int32
    Private _idEtapa As Int32
    Private _idSeparacionVenta As Int32
    Private _estadoCreditoHip As String
    Private _idSeguimiento As Int32
    Private _seguimiento As String
    Private _fchCreacion As String
    Private _fchModificacion As String
    Private _Observacion As String
    Private _estado As String
    Private _desEstado As String
    Private _idUsuario As Int32
    Private _desUsuario As String
#End Region

#Region "           Propiedades                     "
    Public Property idProyecto() As Int32
        Get
            Return _idProyecto
        End Get
        Set(ByVal value As Int32)
            _idProyecto = value
        End Set
    End Property
    Public Property idEtapa() As Int32
        Get
            Return _idEtapa
        End Get
        Set(ByVal value As Int32)
            _idEtapa = value
        End Set
    End Property
    Public Property idSeparacionVenta() As Int32
        Get
            Return _idSeparacionVenta
        End Get
        Set(ByVal value As Int32)
            _idSeparacionVenta = value
        End Set
    End Property
    Public Property estadoCreditoHip() As String
        Get
            Return _estadoCreditoHip
        End Get
        Set(ByVal value As String)
            _estadoCreditoHip = value
        End Set
    End Property
    Public Property idSeguimiento() As Int32
        Get
            Return _idSeguimiento
        End Get
        Set(ByVal value As Int32)
            _idSeguimiento = value
        End Set
    End Property
    Public Property seguimiento() As String
        Get
            Return _seguimiento
        End Get
        Set(ByVal value As String)
            _seguimiento = value
        End Set
    End Property
    Public Property fchCreacion() As String
        Get
            Return _fchCreacion
        End Get
        Set(ByVal value As String)
            _fchCreacion = value
        End Set
    End Property
    Public Property fchModificacion() As String
        Get
            Return _fchModificacion
        End Get
        Set(ByVal value As String)
            _fchModificacion = value
        End Set
    End Property
    Public Property Observacion() As String
        Get
            Return _Observacion
        End Get
        Set(ByVal value As String)
            _Observacion = value
        End Set
    End Property
    Public Property estado() As String
        Get
            Return _estado
        End Get
        Set(ByVal value As String)
            _estado = value
        End Set
    End Property
    Public Property desEstado() As String
        Get
            Return _desEstado
        End Get
        Set(ByVal value As String)
            _desEstado = value
        End Set
    End Property
    Public Property idUsuario() As Int32
        Get
            Return _idUsuario
        End Get
        Set(ByVal value As Int32)
            _idUsuario = value
        End Set
    End Property
    Public Property descUsuario() As String
        Get
            Return _desUsuario
        End Get
        Set(ByVal value As String)
            _desUsuario = value
        End Set
    End Property
#End Region

#Region "           Propiedades Avanzadas           "
    
#End Region

#Region "           Contructores                    "
    Public Sub New()

    End Sub  
    Public Sub New(ByVal idProyecto As Int32, ByVal idEtapa As Int32, ByVal idSeparacionVenta As Int32, ByVal estadoCreditoHip As String, _
                   ByVal idSeguimiento As Int32, ByVal Seguimiento As String, ByVal fchCreacion As String, ByVal fchModificacion As String, _
                   ByVal Observacion As String)
        Me.idProyecto = idProyecto
        Me.idEtapa = idEtapa
        Me.idSeparacionVenta = idSeparacionVenta
        Me.estadoCreditoHip = estadoCreditoHip
        Me.idSeguimiento = idSeguimiento
        Me.seguimiento = Seguimiento
        Me.fchCreacion = fchCreacion
        Me.fchModificacion = fchModificacion
        Me.Observacion = Observacion        
    End Sub

    Public Sub New(ByVal idProyecto As Int32, ByVal idEtapa As Int32, ByVal idSeparacionVenta As Int32, ByVal estadotechopropio As String, _
                   ByVal descEstado As String, _
               ByVal idInstanciaTP As Int32, ByVal Seguimiento As String, ByVal fchCreacion As String, ByVal fchModificacion As String, _
               ByVal Observacion As String, ByVal Usuario As Int32, ByVal descUsuario As String)
        Me.idProyecto = idProyecto
        Me.idEtapa = idEtapa
        Me.idSeparacionVenta = idSeparacionVenta
        Me.estadoCreditoHip = estadotechopropio
        Me.idSeguimiento = idInstanciaTP
        Me.seguimiento = Seguimiento
        Me.fchCreacion = fchCreacion
        Me.fchModificacion = fchModificacion
        Me.Observacion = Observacion
        Me.idUsuario = Usuario
        Me.descUsuario = descUsuario
        Me.desEstado = descEstado
    End Sub
#End Region

End Class
